home *** CD-ROM | disk | FTP | other *** search
/ Best of www.BestZips.com (Collector's Edition) / Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO / grapprog / splt300w.zip / TDXY.ZIP / T2-17.BAS < prev    next >
BASIC Source File  |  1990-02-19  |  202b  |  10 lines
  1. 10 OPEN "t2-17.plt" FOR OUTPUT AS #1
  2. 20 PRINT #1,"M0,1200"
  3. 30 FOR I=-5 TO 5
  4. 40  PRINT #1,"L";I
  5. 60  PRINT #1,"PP=";I
  6. 70  PRINT #1,"I1000,0"
  7. 80  PRINT #1,"R-1120,100"
  8. 90 NEXT I
  9. 110 PRINT #1,"H"
  10.